module mat_param
  use param
  implicit none
  
  ! Lattice paramters
  real(dbl) :: dist_a0

  ! Density of the target material
  real(dbl) :: mat_density

  ! Atomic number
  real(dbl) :: atomic_no

  ! Pre-calculated parameters
  real(dbl) :: half_a0,dist_r0

  ! Number of host atoms
  real(dbl) :: hosts,ihosts

end module mat_param
